Imports Microsoft.VisualBasic

'PUNT extra DE L'EXAMEN: Llistat de productes
Public Class Producte
    Private m_product_id As Integer
    Private m_desc As String


    Public Property ProductID() As Integer
        Get
            Return m_product_id
        End Get
        Set(ByVal value As Integer)
            m_product_id = value
        End Set
    End Property

    Public Property Descripcio() As String
        Get
            Return m_desc
        End Get
        Set(ByVal value As String)
            m_desc = value
        End Set
    End Property


End Class